:: callls the logger s/set/export/gi s/%//gi s/%_/\$/gi s/\.cmd/.sh/gi for *nix ; ) 
set _BaseDir=E:\Perl\sfw
set _ProjectName=logger
set _ProjectVersion=0.2.0
set _ProjectVersionDir=%_BaseDir%\%_ProjectName%\%_ProjectName%.%_ProjectVersion%

set _PerlScript=%_ProjectVersionDir%\%_ProjectName%.pl
set _CmdScript=%_ProjectVersionDir%\%_ProjectName%.cmd


:: Action !!!
perl %_PerlScript% 

:: ping localhost -n 5
pause